Gets the object containing a collection of all certificate system store locations in the system.
Syntax:
ReturnsSet <oStoreLocations> = object.GetCertificateStoreLocations
Returns an object of type FREDI.ediSecurityCertStoreLocations.
Example:
Dim oEdiDoc As Fredi.ediDocument
Dim oSecurities As Fredi.ediSecurities
Dim oCertStoreLocations As Fredi.ediSecurityCertStoreLocations
Dim oCertificateStores As Fredi.ediSecurityCertificateStores
' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument
' Get the securities object
Set oSecurities = oEdiDoc.GetSecurities
' Get the certificate store locations object.
Set oCertStoreLocations = oSecurities.GetCertificateStoreLocations
' Get a single certificate store location.
Set oCertificateStores = oCertStoreLocations.GetCertificateStores("LocalMachine")
MsgBox "Location: " & oCertificateStores.Location & ", Store Count=" & oCertificateStores.Count
Sample